home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / misc / math / MathFX_src.lha / fxsmaj.c < prev    next >
C/C++ Source or Header  |  1995-12-20  |  213b  |  15 lines
  1. #include "mathfx.h"
  2.  
  3. void fxsmaj(def,scale)
  4. float def,scale;
  5. {
  6.     float defalt, ht;
  7.  
  8.     if (def != 0.0)
  9.        smaj(def,scale*def);
  10.     else {
  11.        gmaj(&defalt,&ht);
  12.        smaj(defalt,scale*defalt);
  13.     }
  14. }
  15.